﻿<!-- #include file="mymin.asp" -->
<%
Call Head()
w "<card title='文章删除结果'><p>"

dim rs,sql,id,classid
id=request.QueryString("id")
if id="" or IsNumeric(id)=False then Call Error("ID无效！")

classid=int(request.QueryString("classid"))

set rs=server.createobject("adodb.recordset")
rs.open "Select * from 74hu_article where id="&id ,myconn,2,3
If Not rs.eof	Then
	rs.delete
	w "文章删除成功!"
else
	w "文章删除失败!可能已删除或者文章不存在"
end if
rs.close
set rs=nothing

%>
<br/>----------<br/>
<a href="adminsmscl.asp?sid=<%=sid%>&amp;id=<%=classid%>">[文章列表]</a><br/>
<a href="wzclass.asp?sid=<%=sid%>&amp;id=<%=id%>">[文章分类]</a><%Call last%>